﻿Imports DAO
Imports DTO
Public Class Sach_BUS
    Public Shared Function NhapSach(ByVal sach As Sach_DTO) As Integer
        Return Sach_DAO.NhapSach(sach)
    End Function

    Public Shared Function LaySach() As DataTable
        Return Sach_DAO.LaySach()
    End Function

    Public Shared Function LaySachTheoMa(ByVal ma As Integer) As DataTable
        Return Sach_DAO.LaySachTheoMa(ma)
    End Function

    Public Shared Function LayTinhTrang() As DataTable
        Return Sach_DAO.LayTinhTrang()
    End Function

    Public Shared Function SuaSach(ByVal ma As Integer, ByVal ten As String, ByVal matl As Integer, ByVal tg As String, ByVal sl As Integer, ByVal dg As Double, ByVal matt As Integer) As Integer
        Return Sach_DAO.SuaSach(ma, ten, matl, tg, sl, dg, matt)
    End Function

    Public Function TraCuuSach(ByVal sachCRT As Sach_CRT) As DataTable
        Dim dt As DataTable
        dt = Sach_DAO.TraCuuSach(sachCRT)
        Return dt
    End Function

    Public Shared Function BaoCao(ByVal thangbaocao As Integer) As DataTable
        Return Sach_DAO.BaoCao(thangbaocao)
    End Function
End Class
